3.9.97 \(\int \frac {\sin (c+d x) \tan ^9(c+d x)}{a+a \sin (c+d x)} \, dx\) [897]

3.9.97.1 Optimal result
3.9.97.2 Mathematica [A] (verified)
3.9.97.3 Rubi [A] (verified)
3.9.97.4 Maple [A] (verified)
3.9.97.5 Fricas [A] (verification not implemented)
3.9.97.6 Sympy [F(-1)]
3.9.97.7 Maxima [A] (verification not implemented)
3.9.97.8 Giac [A] (verification not implemented)
3.9.97.9 Mupad [B] (verification not implemented)

3.9.97.1 Optimal result

Integrand size = 27, antiderivative size = 233 \[ \int \frac {\sin (c+d x) \tan ^9(c+d x)}{a+a \sin (c+d x)} \, dx=-\frac {193 \log (1-\sin (c+d x))}{512 a d}-\frac {319 \log (1+\sin (c+d x))}{512 a d}+\frac {a^3}{256 d (a-a \sin (c+d x))^4}-\frac {7 a^2}{192 d (a-a \sin (c+d x))^3}+\frac {81 a}{512 d (a-a \sin (c+d x))^2}-\frac {61}{128 d (a-a \sin (c+d x))}-\frac {a^4}{160 d (a+a \sin (c+d x))^5}+\frac {15 a^3}{256 d (a+a \sin (c+d x))^4}-\frac {95 a^2}{384 d (a+a \sin (c+d x))^3}+\frac {325 a}{512 d (a+a \sin (c+d x))^2}-\frac {315}{256 d (a+a \sin (c+d x))} \]

output
-193/512*ln(1-sin(d*x+c))/a/d-319/512*ln(1+sin(d*x+c))/a/d+1/256*a^3/d/(a- 
a*sin(d*x+c))^4-7/192*a^2/d/(a-a*sin(d*x+c))^3+81/512*a/d/(a-a*sin(d*x+c)) 
^2-61/128/d/(a-a*sin(d*x+c))-1/160*a^4/d/(a+a*sin(d*x+c))^5+15/256*a^3/d/( 
a+a*sin(d*x+c))^4-95/384*a^2/d/(a+a*sin(d*x+c))^3+325/512*a/d/(a+a*sin(d*x 
+c))^2-315/256/d/(a+a*sin(d*x+c))
 
3.9.97.2 Mathematica [A] (verified)

Time = 4.82 (sec) , antiderivative size = 137, normalized size of antiderivative = 0.59 \[ \int \frac {\sin (c+d x) \tan ^9(c+d x)}{a+a \sin (c+d x)} \, dx=-\frac {2895 \log (1-\sin (c+d x))+4785 \log (1+\sin (c+d x))+\frac {2 \left (4384+3439 \sin (c+d x)-16561 \sin ^2(c+d x)-12151 \sin ^3(c+d x)+23049 \sin ^4(c+d x)+14985 \sin ^5(c+d x)-13815 \sin ^6(c+d x)-6705 \sin ^7(c+d x)+2895 \sin ^8(c+d x)\right )}{(-1+\sin (c+d x))^4 (1+\sin (c+d x))^5}}{7680 a d} \]

input
Integrate[(Sin[c + d*x]*Tan[c + d*x]^9)/(a + a*Sin[c + d*x]),x]
 
output
-1/7680*(2895*Log[1 - Sin[c + d*x]] + 4785*Log[1 + Sin[c + d*x]] + (2*(438 
4 + 3439*Sin[c + d*x] - 16561*Sin[c + d*x]^2 - 12151*Sin[c + d*x]^3 + 2304 
9*Sin[c + d*x]^4 + 14985*Sin[c + d*x]^5 - 13815*Sin[c + d*x]^6 - 6705*Sin[ 
c + d*x]^7 + 2895*Sin[c + d*x]^8))/((-1 + Sin[c + d*x])^4*(1 + Sin[c + d*x 
])^5))/(a*d)
 
3.9.97.3 Rubi [A] (verified)

Time = 0.42 (sec) , antiderivative size = 210, normalized size of antiderivative = 0.90, number of steps used = 6, number of rules used = 5, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.185, Rules used = {3042, 3315, 27, 99, 2009}

Below are the steps used by Rubi to obtain the solution. The rule number used for the transformation is given above next to the arrow. The rules definitions used are listed below.

\(\displaystyle \int \frac {\sin (c+d x) \tan ^9(c+d x)}{a \sin (c+d x)+a} \, dx\)

\(\Big \downarrow \) 3042

\(\displaystyle \int \frac {\sin (c+d x)^{10}}{\cos (c+d x)^9 (a \sin (c+d x)+a)}dx\)

\(\Big \downarrow \) 3315

\(\displaystyle \frac {a^9 \int \frac {\sin ^{10}(c+d x)}{(a-a \sin (c+d x))^5 (\sin (c+d x) a+a)^6}d(a \sin (c+d x))}{d}\)

\(\Big \downarrow \) 27

\(\displaystyle \frac {\int \frac {a^{10} \sin ^{10}(c+d x)}{(a-a \sin (c+d x))^5 (\sin (c+d x) a+a)^6}d(a \sin (c+d x))}{a d}\)

\(\Big \downarrow \) 99

\(\displaystyle \frac {\int \left (\frac {a^5}{32 (\sin (c+d x) a+a)^6}+\frac {a^4}{64 (a-a \sin (c+d x))^5}-\frac {15 a^4}{64 (\sin (c+d x) a+a)^5}-\frac {7 a^3}{64 (a-a \sin (c+d x))^4}+\frac {95 a^3}{128 (\sin (c+d x) a+a)^4}+\frac {81 a^2}{256 (a-a \sin (c+d x))^3}-\frac {325 a^2}{256 (\sin (c+d x) a+a)^3}-\frac {61 a}{128 (a-a \sin (c+d x))^2}+\frac {315 a}{256 (\sin (c+d x) a+a)^2}+\frac {193}{512 (a-a \sin (c+d x))}-\frac {319}{512 (\sin (c+d x) a+a)}\right )d(a \sin (c+d x))}{a d}\)

\(\Big \downarrow \) 2009

\(\displaystyle \frac {-\frac {a^5}{160 (a \sin (c+d x)+a)^5}+\frac {a^4}{256 (a-a \sin (c+d x))^4}+\frac {15 a^4}{256 (a \sin (c+d x)+a)^4}-\frac {7 a^3}{192 (a-a \sin (c+d x))^3}-\frac {95 a^3}{384 (a \sin (c+d x)+a)^3}+\frac {81 a^2}{512 (a-a \sin (c+d x))^2}+\frac {325 a^2}{512 (a \sin (c+d x)+a)^2}-\frac {61 a}{128 (a-a \sin (c+d x))}-\frac {315 a}{256 (a \sin (c+d x)+a)}-\frac {193}{512} \log (a-a \sin (c+d x))-\frac {319}{512} \log (a \sin (c+d x)+a)}{a d}\)

input
Int[(Sin[c + d*x]*Tan[c + d*x]^9)/(a + a*Sin[c + d*x]),x]
 
output
((-193*Log[a - a*Sin[c + d*x]])/512 - (319*Log[a + a*Sin[c + d*x]])/512 + 
a^4/(256*(a - a*Sin[c + d*x])^4) - (7*a^3)/(192*(a - a*Sin[c + d*x])^3) + 
(81*a^2)/(512*(a - a*Sin[c + d*x])^2) - (61*a)/(128*(a - a*Sin[c + d*x])) 
- a^5/(160*(a + a*Sin[c + d*x])^5) + (15*a^4)/(256*(a + a*Sin[c + d*x])^4) 
 - (95*a^3)/(384*(a + a*Sin[c + d*x])^3) + (325*a^2)/(512*(a + a*Sin[c + d 
*x])^2) - (315*a)/(256*(a + a*Sin[c + d*x])))/(a*d)
 

3.9.97.3.1 Defintions of rubi rules used

rule 27
Int[(a_)*(Fx_), x_Symbol] :> Simp[a   Int[Fx, x], x] /; FreeQ[a, x] &&  !Ma 
tchQ[Fx, (b_)*(Gx_) /; FreeQ[b, x]]
 

rule 99
Int[((a_.) + (b_.)*(x_))^(m_)*((c_.) + (d_.)*(x_))^(n_)*((e_.) + (f_.)*(x_) 
)^(p_), x_] :> Int[ExpandIntegrand[(a + b*x)^m*(c + d*x)^n*(e + f*x)^p, x], 
 x] /; FreeQ[{a, b, c, d, e, f, p}, x] && IntegersQ[m, n] && (IntegerQ[p] | 
| (GtQ[m, 0] && GeQ[n, -1]))
 

rule 2009
Int[u_, x_Symbol] :> Simp[IntSum[u, x], x] /; SumQ[u]
 

rule 3042
Int[u_, x_Symbol] :> Int[DeactivateTrig[u, x], x] /; FunctionOfTrigOfLinear 
Q[u, x]
 

rule 3315
Int[cos[(e_.) + (f_.)*(x_)]^(p_)*((a_) + (b_.)*sin[(e_.) + (f_.)*(x_)])^(m_ 
.)*((c_.) + (d_.)*sin[(e_.) + (f_.)*(x_)])^(n_.), x_Symbol] :> Simp[1/(b^p* 
f)   Subst[Int[(a + x)^(m + (p - 1)/2)*(a - x)^((p - 1)/2)*(c + (d/b)*x)^n, 
 x], x, b*Sin[e + f*x]], x] /; FreeQ[{a, b, e, f, c, d, m, n}, x] && Intege 
rQ[(p - 1)/2] && EqQ[a^2 - b^2, 0]
 
3.9.97.4 Maple [A] (verified)

Time = 2.74 (sec) , antiderivative size = 139, normalized size of antiderivative = 0.60

method result size
derivativedivides \(\frac {\frac {1}{256 \left (\sin \left (d x +c \right )-1\right )^{4}}+\frac {7}{192 \left (\sin \left (d x +c \right )-1\right )^{3}}+\frac {81}{512 \left (\sin \left (d x +c \right )-1\right )^{2}}+\frac {61}{128 \left (\sin \left (d x +c \right )-1\right )}-\frac {193 \ln \left (\sin \left (d x +c \right )-1\right )}{512}-\frac {1}{160 \left (1+\sin \left (d x +c \right )\right )^{5}}+\frac {15}{256 \left (1+\sin \left (d x +c \right )\right )^{4}}-\frac {95}{384 \left (1+\sin \left (d x +c \right )\right )^{3}}+\frac {325}{512 \left (1+\sin \left (d x +c \right )\right )^{2}}-\frac {315}{256 \left (1+\sin \left (d x +c \right )\right )}-\frac {319 \ln \left (1+\sin \left (d x +c \right )\right )}{512}}{d a}\) \(139\)
default \(\frac {\frac {1}{256 \left (\sin \left (d x +c \right )-1\right )^{4}}+\frac {7}{192 \left (\sin \left (d x +c \right )-1\right )^{3}}+\frac {81}{512 \left (\sin \left (d x +c \right )-1\right )^{2}}+\frac {61}{128 \left (\sin \left (d x +c \right )-1\right )}-\frac {193 \ln \left (\sin \left (d x +c \right )-1\right )}{512}-\frac {1}{160 \left (1+\sin \left (d x +c \right )\right )^{5}}+\frac {15}{256 \left (1+\sin \left (d x +c \right )\right )^{4}}-\frac {95}{384 \left (1+\sin \left (d x +c \right )\right )^{3}}+\frac {325}{512 \left (1+\sin \left (d x +c \right )\right )^{2}}-\frac {315}{256 \left (1+\sin \left (d x +c \right )\right )}-\frac {319 \ln \left (1+\sin \left (d x +c \right )\right )}{512}}{d a}\) \(139\)
risch \(\frac {i x}{a}+\frac {2 i c}{d a}-\frac {i \left (-26010 i {\mathrm e}^{14 i \left (d x +c \right )}+2895 \,{\mathrm e}^{17 i \left (d x +c \right )}-13410 i {\mathrm e}^{16 i \left (d x +c \right )}+32100 \,{\mathrm e}^{15 i \left (d x +c \right )}+3146 i {\mathrm e}^{8 i \left (d x +c \right )}+118284 \,{\mathrm e}^{13 i \left (d x +c \right )}+71042 i {\mathrm e}^{6 i \left (d x +c \right )}+251548 \,{\mathrm e}^{11 i \left (d x +c \right )}-71042 i {\mathrm e}^{12 i \left (d x +c \right )}+312650 \,{\mathrm e}^{9 i \left (d x +c \right )}-3146 i {\mathrm e}^{10 i \left (d x +c \right )}+251548 \,{\mathrm e}^{7 i \left (d x +c \right )}+26010 i {\mathrm e}^{4 i \left (d x +c \right )}+118284 \,{\mathrm e}^{5 i \left (d x +c \right )}+13410 i {\mathrm e}^{2 i \left (d x +c \right )}+32100 \,{\mathrm e}^{3 i \left (d x +c \right )}+2895 \,{\mathrm e}^{i \left (d x +c \right )}\right )}{1920 \left ({\mathrm e}^{i \left (d x +c \right )}-i\right )^{8} \left ({\mathrm e}^{i \left (d x +c \right )}+i\right )^{10} d a}-\frac {193 \ln \left ({\mathrm e}^{i \left (d x +c \right )}-i\right )}{256 d a}-\frac {319 \ln \left ({\mathrm e}^{i \left (d x +c \right )}+i\right )}{256 a d}\) \(294\)
parallelrisch \(\frac {\left (107520 \sin \left (3 d x +3 c \right )+76800 \sin \left (5 d x +5 c \right )+26880 \sin \left (7 d x +7 c \right )+3840 \sin \left (9 d x +9 c \right )+430080 \cos \left (2 d x +2 c \right )+215040 \cos \left (4 d x +4 c \right )+61440 \cos \left (6 d x +6 c \right )+7680 \cos \left (8 d x +8 c \right )+53760 \sin \left (d x +c \right )+268800\right ) \ln \left (\sec ^{2}\left (\frac {d x}{2}+\frac {c}{2}\right )\right )+\left (-81060 \sin \left (3 d x +3 c \right )-57900 \sin \left (5 d x +5 c \right )-20265 \sin \left (7 d x +7 c \right )-2895 \sin \left (9 d x +9 c \right )-324240 \cos \left (2 d x +2 c \right )-162120 \cos \left (4 d x +4 c \right )-46320 \cos \left (6 d x +6 c \right )-5790 \cos \left (8 d x +8 c \right )-40530 \sin \left (d x +c \right )-202650\right ) \ln \left (\tan \left (\frac {d x}{2}+\frac {c}{2}\right )-1\right )+\left (-133980 \sin \left (3 d x +3 c \right )-95700 \sin \left (5 d x +5 c \right )-33495 \sin \left (7 d x +7 c \right )-4785 \sin \left (9 d x +9 c \right )-535920 \cos \left (2 d x +2 c \right )-267960 \cos \left (4 d x +4 c \right )-76560 \cos \left (6 d x +6 c \right )-9570 \cos \left (8 d x +8 c \right )-66990 \sin \left (d x +c \right )-334950\right ) \ln \left (\tan \left (\frac {d x}{2}+\frac {c}{2}\right )+1\right )-19332 \sin \left (3 d x +3 c \right )+35660 \sin \left (5 d x +5 c \right )+3868 \sin \left (7 d x +7 c \right )+4384 \sin \left (9 d x +9 c \right )-12088 \cos \left (2 d x +2 c \right )+8936 \cos \left (4 d x +4 c \right )+5944 \cos \left (6 d x +6 c \right )+2978 \cos \left (8 d x +8 c \right )+55084 \sin \left (d x +c \right )-5770}{3840 a d \left (70+\sin \left (9 d x +9 c \right )+7 \sin \left (7 d x +7 c \right )+20 \sin \left (5 d x +5 c \right )+28 \sin \left (3 d x +3 c \right )+14 \sin \left (d x +c \right )+2 \cos \left (8 d x +8 c \right )+16 \cos \left (6 d x +6 c \right )+56 \cos \left (4 d x +4 c \right )+112 \cos \left (2 d x +2 c \right )\right )}\) \(538\)

input
int(sec(d*x+c)^9*sin(d*x+c)^10/(a+a*sin(d*x+c)),x,method=_RETURNVERBOSE)
 
output
1/d/a*(1/256/(sin(d*x+c)-1)^4+7/192/(sin(d*x+c)-1)^3+81/512/(sin(d*x+c)-1) 
^2+61/128/(sin(d*x+c)-1)-193/512*ln(sin(d*x+c)-1)-1/160/(1+sin(d*x+c))^5+1 
5/256/(1+sin(d*x+c))^4-95/384/(1+sin(d*x+c))^3+325/512/(1+sin(d*x+c))^2-31 
5/256/(1+sin(d*x+c))-319/512*ln(1+sin(d*x+c)))
 
3.9.97.5 Fricas [A] (verification not implemented)

Time = 0.29 (sec) , antiderivative size = 187, normalized size of antiderivative = 0.80 \[ \int \frac {\sin (c+d x) \tan ^9(c+d x)}{a+a \sin (c+d x)} \, dx=-\frac {5790 \, \cos \left (d x + c\right )^{8} + 4470 \, \cos \left (d x + c\right )^{6} - 2052 \, \cos \left (d x + c\right )^{4} + 656 \, \cos \left (d x + c\right )^{2} + 4785 \, {\left (\cos \left (d x + c\right )^{8} \sin \left (d x + c\right ) + \cos \left (d x + c\right )^{8}\right )} \log \left (\sin \left (d x + c\right ) + 1\right ) + 2895 \, {\left (\cos \left (d x + c\right )^{8} \sin \left (d x + c\right ) + \cos \left (d x + c\right )^{8}\right )} \log \left (-\sin \left (d x + c\right ) + 1\right ) + 2 \, {\left (6705 \, \cos \left (d x + c\right )^{6} - 5130 \, \cos \left (d x + c\right )^{4} + 2296 \, \cos \left (d x + c\right )^{2} - 432\right )} \sin \left (d x + c\right ) - 96}{7680 \, {\left (a d \cos \left (d x + c\right )^{8} \sin \left (d x + c\right ) + a d \cos \left (d x + c\right )^{8}\right )}} \]

input
integrate(sec(d*x+c)^9*sin(d*x+c)^10/(a+a*sin(d*x+c)),x, algorithm="fricas 
")
 
output
-1/7680*(5790*cos(d*x + c)^8 + 4470*cos(d*x + c)^6 - 2052*cos(d*x + c)^4 + 
 656*cos(d*x + c)^2 + 4785*(cos(d*x + c)^8*sin(d*x + c) + cos(d*x + c)^8)* 
log(sin(d*x + c) + 1) + 2895*(cos(d*x + c)^8*sin(d*x + c) + cos(d*x + c)^8 
)*log(-sin(d*x + c) + 1) + 2*(6705*cos(d*x + c)^6 - 5130*cos(d*x + c)^4 + 
2296*cos(d*x + c)^2 - 432)*sin(d*x + c) - 96)/(a*d*cos(d*x + c)^8*sin(d*x 
+ c) + a*d*cos(d*x + c)^8)
 
3.9.97.6 Sympy [F(-1)]

Timed out. \[ \int \frac {\sin (c+d x) \tan ^9(c+d x)}{a+a \sin (c+d x)} \, dx=\text {Timed out} \]

input
integrate(sec(d*x+c)**9*sin(d*x+c)**10/(a+a*sin(d*x+c)),x)
 
output
Timed out
 
3.9.97.7 Maxima [A] (verification not implemented)

Time = 0.21 (sec) , antiderivative size = 214, normalized size of antiderivative = 0.92 \[ \int \frac {\sin (c+d x) \tan ^9(c+d x)}{a+a \sin (c+d x)} \, dx=-\frac {\frac {2 \, {\left (2895 \, \sin \left (d x + c\right )^{8} - 6705 \, \sin \left (d x + c\right )^{7} - 13815 \, \sin \left (d x + c\right )^{6} + 14985 \, \sin \left (d x + c\right )^{5} + 23049 \, \sin \left (d x + c\right )^{4} - 12151 \, \sin \left (d x + c\right )^{3} - 16561 \, \sin \left (d x + c\right )^{2} + 3439 \, \sin \left (d x + c\right ) + 4384\right )}}{a \sin \left (d x + c\right )^{9} + a \sin \left (d x + c\right )^{8} - 4 \, a \sin \left (d x + c\right )^{7} - 4 \, a \sin \left (d x + c\right )^{6} + 6 \, a \sin \left (d x + c\right )^{5} + 6 \, a \sin \left (d x + c\right )^{4} - 4 \, a \sin \left (d x + c\right )^{3} - 4 \, a \sin \left (d x + c\right )^{2} + a \sin \left (d x + c\right ) + a} + \frac {4785 \, \log \left (\sin \left (d x + c\right ) + 1\right )}{a} + \frac {2895 \, \log \left (\sin \left (d x + c\right ) - 1\right )}{a}}{7680 \, d} \]

input
integrate(sec(d*x+c)^9*sin(d*x+c)^10/(a+a*sin(d*x+c)),x, algorithm="maxima 
")
 
output
-1/7680*(2*(2895*sin(d*x + c)^8 - 6705*sin(d*x + c)^7 - 13815*sin(d*x + c) 
^6 + 14985*sin(d*x + c)^5 + 23049*sin(d*x + c)^4 - 12151*sin(d*x + c)^3 - 
16561*sin(d*x + c)^2 + 3439*sin(d*x + c) + 4384)/(a*sin(d*x + c)^9 + a*sin 
(d*x + c)^8 - 4*a*sin(d*x + c)^7 - 4*a*sin(d*x + c)^6 + 6*a*sin(d*x + c)^5 
 + 6*a*sin(d*x + c)^4 - 4*a*sin(d*x + c)^3 - 4*a*sin(d*x + c)^2 + a*sin(d* 
x + c) + a) + 4785*log(sin(d*x + c) + 1)/a + 2895*log(sin(d*x + c) - 1)/a) 
/d
 
3.9.97.8 Giac [A] (verification not implemented)

Time = 0.43 (sec) , antiderivative size = 156, normalized size of antiderivative = 0.67 \[ \int \frac {\sin (c+d x) \tan ^9(c+d x)}{a+a \sin (c+d x)} \, dx=-\frac {\frac {19140 \, \log \left ({\left | \sin \left (d x + c\right ) + 1 \right |}\right )}{a} + \frac {11580 \, \log \left ({\left | \sin \left (d x + c\right ) - 1 \right |}\right )}{a} - \frac {5 \, {\left (4825 \, \sin \left (d x + c\right )^{4} - 16372 \, \sin \left (d x + c\right )^{3} + 21138 \, \sin \left (d x + c\right )^{2} - 12236 \, \sin \left (d x + c\right ) + 2669\right )}}{a {\left (\sin \left (d x + c\right ) - 1\right )}^{4}} - \frac {43703 \, \sin \left (d x + c\right )^{5} + 180715 \, \sin \left (d x + c\right )^{4} + 305330 \, \sin \left (d x + c\right )^{3} + 261130 \, \sin \left (d x + c\right )^{2} + 112415 \, \sin \left (d x + c\right ) + 19411}{a {\left (\sin \left (d x + c\right ) + 1\right )}^{5}}}{30720 \, d} \]

input
integrate(sec(d*x+c)^9*sin(d*x+c)^10/(a+a*sin(d*x+c)),x, algorithm="giac")
 
output
-1/30720*(19140*log(abs(sin(d*x + c) + 1))/a + 11580*log(abs(sin(d*x + c) 
- 1))/a - 5*(4825*sin(d*x + c)^4 - 16372*sin(d*x + c)^3 + 21138*sin(d*x + 
c)^2 - 12236*sin(d*x + c) + 2669)/(a*(sin(d*x + c) - 1)^4) - (43703*sin(d* 
x + c)^5 + 180715*sin(d*x + c)^4 + 305330*sin(d*x + c)^3 + 261130*sin(d*x 
+ c)^2 + 112415*sin(d*x + c) + 19411)/(a*(sin(d*x + c) + 1)^5))/d
 
3.9.97.9 Mupad [B] (verification not implemented)

Time = 10.61 (sec) , antiderivative size = 539, normalized size of antiderivative = 2.31 \[ \int \frac {\sin (c+d x) \tan ^9(c+d x)}{a+a \sin (c+d x)} \, dx=\frac {\frac {63\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{17}}{128}-\frac {65\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{16}}{64}-\frac {233\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{15}}{32}+\frac {413\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{14}}{64}+\frac {6527\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{13}}{160}-\frac {14911\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{12}}{960}-\frac {59737\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{11}}{480}+\frac {12763\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{10}}{960}+\frac {45791\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^9}{192}+\frac {12763\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^8}{960}-\frac {59737\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^7}{480}-\frac {14911\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^6}{960}+\frac {6527\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^5}{160}+\frac {413\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^4}{64}-\frac {233\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^3}{32}-\frac {65\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^2}{64}+\frac {63\,\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}{128}}{d\,\left (a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{18}+2\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{17}-7\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{16}-16\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{15}+20\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{14}+56\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{13}-28\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{12}-112\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{11}+14\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^{10}+140\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^9+14\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^8-112\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^7-28\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^6+56\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^5+20\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^4-16\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^3-7\,a\,{\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^2+2\,a\,\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )+a\right )}-\frac {193\,\ln \left (\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )-1\right )}{256\,a\,d}-\frac {319\,\ln \left (\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )+1\right )}{256\,a\,d}+\frac {\ln \left ({\mathrm {tan}\left (\frac {c}{2}+\frac {d\,x}{2}\right )}^2+1\right )}{a\,d} \]

input
int(sin(c + d*x)^10/(cos(c + d*x)^9*(a + a*sin(c + d*x))),x)
 
output
((63*tan(c/2 + (d*x)/2))/128 - (65*tan(c/2 + (d*x)/2)^2)/64 - (233*tan(c/2 
 + (d*x)/2)^3)/32 + (413*tan(c/2 + (d*x)/2)^4)/64 + (6527*tan(c/2 + (d*x)/ 
2)^5)/160 - (14911*tan(c/2 + (d*x)/2)^6)/960 - (59737*tan(c/2 + (d*x)/2)^7 
)/480 + (12763*tan(c/2 + (d*x)/2)^8)/960 + (45791*tan(c/2 + (d*x)/2)^9)/19 
2 + (12763*tan(c/2 + (d*x)/2)^10)/960 - (59737*tan(c/2 + (d*x)/2)^11)/480 
- (14911*tan(c/2 + (d*x)/2)^12)/960 + (6527*tan(c/2 + (d*x)/2)^13)/160 + ( 
413*tan(c/2 + (d*x)/2)^14)/64 - (233*tan(c/2 + (d*x)/2)^15)/32 - (65*tan(c 
/2 + (d*x)/2)^16)/64 + (63*tan(c/2 + (d*x)/2)^17)/128)/(d*(a + 2*a*tan(c/2 
 + (d*x)/2) - 7*a*tan(c/2 + (d*x)/2)^2 - 16*a*tan(c/2 + (d*x)/2)^3 + 20*a* 
tan(c/2 + (d*x)/2)^4 + 56*a*tan(c/2 + (d*x)/2)^5 - 28*a*tan(c/2 + (d*x)/2) 
^6 - 112*a*tan(c/2 + (d*x)/2)^7 + 14*a*tan(c/2 + (d*x)/2)^8 + 140*a*tan(c/ 
2 + (d*x)/2)^9 + 14*a*tan(c/2 + (d*x)/2)^10 - 112*a*tan(c/2 + (d*x)/2)^11 
- 28*a*tan(c/2 + (d*x)/2)^12 + 56*a*tan(c/2 + (d*x)/2)^13 + 20*a*tan(c/2 + 
 (d*x)/2)^14 - 16*a*tan(c/2 + (d*x)/2)^15 - 7*a*tan(c/2 + (d*x)/2)^16 + 2* 
a*tan(c/2 + (d*x)/2)^17 + a*tan(c/2 + (d*x)/2)^18)) - (193*log(tan(c/2 + ( 
d*x)/2) - 1))/(256*a*d) - (319*log(tan(c/2 + (d*x)/2) + 1))/(256*a*d) + lo 
g(tan(c/2 + (d*x)/2)^2 + 1)/(a*d)